home *** CD-ROM | disk | FTP | other *** search
/ Power Bytes: Money & Finance / PowerBytes Money and Finance CD-ROM 01 / PowerBytes Money and Finance CD-ROM 01.iso / New Files / What? / card_2537.txt < prev    next >
Encoding:
Text File  |  1988-11-20  |  2.2 KB  |  85 lines
  1. -- card: 2537 from stack: in
  2. -- bmap block id: 0
  3. -- flags: 0000
  4. -- background id: 2073
  5. -- name: 
  6. ----- HyperTalk script -----
  7. on mouseUp
  8.   show menuBar
  9. end mouseUp
  10.  
  11.  
  12. -- part 1 (button)
  13. -- low flags: 00
  14. -- high flags: 8000
  15. -- rect: left=80 top=80 right=198 bottom=191
  16. -- title width / last selected line: 0
  17. -- icon id / first selected line: 0 / 0
  18. -- text alignment: 1
  19. -- font id: 0
  20. -- text size: 12
  21. -- style flags: 2048
  22. -- line height: 16
  23. -- part name: What?
  24. ----- HyperTalk script -----
  25. --"What?" created by David Sharpness.  A DolphinWordsΓäó "ButtonPoem┬⌐"
  26. --November l988.  The dialog is from the film "Bringing Up Baby"
  27. --starring Katherine Hepburn and Cary Grant.
  28. --#2
  29. --e-mail to D.Sharpness1 on GEnie
  30. --You know, some of you creative types out there could make some neat
  31. --HyperComics using this idea.  (or foreign language to English --dialogs)
  32. --Note:  The first time I made this button it repeated five times,
  33. --and had the appearance of an endless loop (which of course fit
  34. --the meaning (the object of a concrete poem)). --And it worried the SYSOP(writers BBS).  If you want it to
  35. --loop, hold the mouse down. It also is made to fit with the Tiger
  36. --in Hypercard's clip art. Cut and paste.  Study the script
  37. --to create ones of your own.
  38. on mouseStillDown
  39.   hide menubar
  40.   set cursor to 4
  41.   set textStyle of me to outline
  42.   set name of me to " "
  43.   set the rect of me to 100,232,371,250
  44.   set the name of me to "You remind me of a man."
  45.   wait 120
  46.   set the name of me to " "
  47.   set the rect of me to 80,80,191,198
  48.   set the name of me to "What man?"
  49.   wait 120
  50.   set the name of me to " "
  51.   set the rect of me to 100,232,371,250
  52.   set the name of me to "The man with the power."
  53.   wait 60
  54.   set the name of me to " "
  55.   set the rect of me to 80,80,191,198
  56.   set the name of me to "What power?"
  57.   wait 30
  58.   set the name of me to " "
  59.   set the rect of me to 100,232,371,250
  60.   set the name of me to "The power of Hoodoo!"
  61.   wait 90
  62.   set the name of me to " "
  63.   set the rect of me to 80,80,191,198
  64.   set the name of me to "HOODOO!?"
  65.   wait 30
  66.   set the name of me to " "
  67.   set the rect of me to 100,232,371,250
  68.   set the name of me to "YOU DO!"
  69.   wait 15
  70.   set the name of me to " "
  71.   set the rect of me to 80,80,191,198
  72.   set the name of me to "What?"
  73.   wait 90
  74. end mouseStillDown
  75.  
  76.  
  77.  
  78.  
  79.  
  80.  
  81.  
  82.  
  83.  
  84.  
  85.